Gedämpfte Schwingung

Version Stand
29.11.2018
Andreas Jäger

Stand

Ungedämpfte Schwingung

Gedämpfte Schwingung

Aperiodischer Grenzfall

Kriechfall

ungedämpft

gedämpft

aperiodisch

Kriechfall

s(t)

Spur

2

3

0

1

k =

ω_0 =

<

<<

>

>>

4

5

λ = -3 (slider from -5 to 5, step 1)
A_0 = 1 (slider from 0 to 5, step 0.1)
ω_0 = 3.35 (slider from 0 to 5, step 0.01)
φ_0 = -1.57079633 (slider from -1.57079633 to 3.141592653589793, step 1.57079633 / 2)
k = 0.7 (slider from 0 to 5, step 0.01)
A(x) = If[x ≥ 0, (A_0 * ℯ^(((-k) * x)))]
ω: sqrt(ω_0^(2) - k^(2))
a = false
b: k ≟ 0
c: 0 < k < ω_0
d: k ≟ ω_0
e: k > ω_0
s(x) = If[x ≥ 0, If[k ≤ ω_0, (A(x) * sin((ω * x) + φ_0)), A]]
t = 1.34 (slider from 0 to 20, step 1.0E-4)
P_0: (0, s(t))
P_t: (t, s(t))
Text9: "T = " + (LaTeX[(2 * π / ω)]) + "\ s"
Text3: "ω = " + (LaTeX[ω]) + ""
b_s = true
s_2(x) = If[x ≤ t, s(x)]
b_{sp} = false
Text13: "t = " + (LaTeX[t]) + "\ s"
Text12: "φ_0 = " + (LaTeX[φ_0]) + ""
Eingabefeld1 = Textfield(k)
Eingabefeld2 = Textfield(ω_0)